10 IFA=1THENPOKE53281,246:GOTO100
20 POKE53281,0
30 PRINT"[147]"
40 PRINT"[207][183][183][183][183][183][183][183][183][183][183][183][183][183][183][183][183][183][183][183][183][183][183][183][208]"
50 PRINT"[180]     L O A D I N G     [170]"
60 PRINT"[180]                       [170]"
70 PRINT"[180]   B A S I C - A I D   [170]"
80 PRINT"[204][175][175][175][175][175][175][175][175][175][175][175][175][175][175][175][175][175][175][175][175][175][175][175][186]"
90 IFA=0THENA=1:LOAD"BASIC-AID*",8,1
100 PRINT"[147]NEW":PRINT"SYS49152[154]"
110 POKE198,2:POKE631,13:POKE632,13